home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 30
/
Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso
/
Aminet
/
dev
/
asm
/
ESA.readme
< prev
next >
Wrap
Text File
|
1999-03-02
|
2KB
|
58 lines
Short: Extended Syntax Assembly v1.6
Author: bevilacq@cli.di.unipi.it (Simone Bevilacqua)
Uploader: bevilacq@cli.di.unipi.it (Simone Bevilacqua)
Type: dev/asm
Requires: 020+ CPU, KS 2.0
Replaces: dev/asm/ESA.lha
Ever heard of "inline asm" inside C, Pascal, etc. ?
Well, here we have "inline C, Pascal, etc." inside asm!
Look below: that's a small sample of ESA code!!!
procedure CpyQtd{a1-a2},d0-d1/a1-a2
move.b (a1)+,d0 ;get "quote"
repeat
move.b (a1)+,d1
switch.s d1.b
-> d0 ;successful copy
clr.b (a1) ;NULL-termination
moveq.l #0,d1 ;exit loop
-> #0 ;unvalid char, exit loop
suba.l a1,a1 ;please, let it be...
-> #10 ;unvalid char
moveq.l #0,d1 ;exit loop
suba.l a1,a1 ;please, let it be...
def
move.b d1,(a2)+ ;copy char
eswitch
until.s ~d1.b
movea.l a1,a0 ;new string ptr
eproc
============================= Archive contents =============================
Original Packed Ratio Date Time Name
-------- ------- ----- --------- -------- -------------
23988 12361 48.4% 18-Dec-98 03:44:34 +ESA
103062 31400 69.5% 18-Dec-98 03:44:30 +ESA.guide
2830 978 65.4% 18-Dec-98 03:44:28 +MergeSort.ei
1726 730 57.7% 18-Dec-98 03:44:28 +QuickSort.ei
2714 1012 62.7% 18-Dec-98 03:44:28 +data.i
1219 452 62.9% 18-Dec-98 03:44:28 +defs.i
898 348 61.2% 18-Dec-98 03:44:28 +main.esa
6789 2066 69.5% 18-Dec-98 03:44:28 +misc.ei
6640 2305 65.2% 18-Dec-98 03:44:28 +opt.ei
1915 871 54.5% 18-Dec-98 03:44:28 +split.ei
526 283 46.1% 18-Dec-98 03:44:28 +do
12488 4475 64.1% 18-Dec-98 03:44:30 +sss.guide
191 101 47.1% 18-Dec-98 03:44:28 +tab.txt
-------- ------- ----- --------- --------
164986 57382 65.2% 18-Jan-99 23:18:30 13 files